home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / oct94 / mp_fig05.gif < prev    next >
Graphics Interchange Format  |  1996-07-10  |  22.5 KB  |  801x600  |  4-bit (9 colors)
   ocr: Paradox for' Windows File Edit Language Debug Properties Window Help - ae INSTMAIN:mButtong:-placeCode* INSTMAIN:HButton9:Var* method placeCode(uar fm Form, t var const StUDJectname String, fmTarget Form const stMethodName String, uiTarget UIObject const stMethodText String) stMethod, stCode String mlarget.attach(fm'title) enduar uiTarget.attattach(fm,StUbjectname) stMethod = stMethodName stCode = - StMethodlext - self.postaction(Useraction) Edit Line 6: Col7 endmethod 4 + idit Line: 1 Coll INSTMAIN.mButton9:action* method action(var eventinfo ActionEvent) t if eventinfo.1d0) = UserAction then ...